Dr. Windows 3

home *** CD-ROM | disk | FTP | other *** search

/ Dr. Windows 3 / dr win3.zip / dr win3 / TOOLBOOK / MINISPY.ZIP / ASSIGN.SBK (.txt) next >

Wrap

Asymetrix ToolBook File | 1993-08-19 | 53KB | 1,527 lines

assignments assignment2 B assignmentList assignment6 assignment5 assignment4 assignment3 AnythingGoes InsertPages DeleteThisPage CutThisPage CopyThisPage DuplicateThisPage copyTarget assignment2 assignment1 FindObjectByType FindObjectByName ObjectsOfThisPage tms rmn test2 test3 test4 assignment3 assignment4 assignment5 assignment6 System tms rmn tms rmn showmenubar buttonUpToSelection assignment6 assignment5 assignment4 assignment3 AnythingGoes InsertPages DeleteThisPage CutThisPage CopyThisPage DuplicateThisPage copyTarget assignment2 assignment1 FindObjectByType FindObjectByName ObjectsOfThisPage _GetCommandWindow _MiniSpy_HELP _Assign_HELP CloneClusterIntoN CloneCluster CloneSelection CloneTarget ExecuteCommand showmenubar buttonUpToSelection InsertPages DeleteThisPage CutThisPage CopyThisPage DuplicateThisPage copyTarget FindObjectByType FindObjectByName ObjectsOfThisPage y_HELP _Assign_HELP CloneClusterIntoN CloneCluster CloneSelection CloneTarget ExecuteCommand showmenubar buttonUpToSelection InsertPages DeleteThisPage CutThisPage CopyThisPage DuplicateThisPage copyTarget FindObjectByType FindObjectByName ObjectsOfThisPage GetCommandWindow _MiniSpy_HELP _Assign_HELP CloneClusterIntoN CloneCluster CloneSelection CloneTarget ExecuteCommand showmenubar buttonUpToSelection InsertPages DeleteThisPage CutThisPage CopyThisPage DuplicateThisPage copyTarget FindObjectByType FindObjectByName ObjectsOfThisPage assignment6 PageSavedInMWS Assign code MKcopyInfo 3,C:\HJS\X-DEV\X-UTIL\ASSIGN.SBK ,;Ba* testing only" buttonUp buttonUp for testing only Current Assignments: assignment5 assignment4 assignment3 AnythingGoes InsertPages DeleteThisPage CutThisPage CopyThisPage DuplicateThisPage copyTarget assignment2 assignment1 FindObjectByType FindObjectByName ObjectsOfThisPage EditAssignments "Do you want me update the assignment list?" "&Yes" OR "&No" "yes" processAssignments buttonUp buttonUp Do you want me to update the assignment list? FprocessAssignments Edit Assignments UpdateAssignments ProcessAssignments buttonUp buttonUp FProcessAssignments Update Assignments progressReport Instructions 1'N%+ "notepad.exe Assign2.txt" buttonUp buttonUp notepad.exe Assign2.txt Instructions currentAssignments PageSavedInMWS MiniSpy Assignment Depositoryy testing only" buttonUp buttonUp for testing only Current Assignments: assignment5 assignment4 assignment3 AnythingGoes InsertPages DeleteThisPage CutThisPage CopyThisPage DuplicateThisPage copyTarget assignment2 assignment1 FindObjectByType FindObjectByName ObjectsOfThisPage EditAssignments "Do you want me update the assignment list?" "&Yes" OR "&No" "yes" processAssignments buttonUp buttonUp Do you want me to update the assignment list? FprocessAssignments Edit Assignments UpdateAssignments ProcessAssignments buttonUp buttonUp FProcessAssignments Update Assignments progressReport Instructions "notepad.exe Assign.txt" buttonUp buttonUp notepad.exe Assign.txt Instructions currentAssignments ... updating Assignmentsts ... updating Assignmentsts B"updateAssignments" enterPage enterPage buttonUp updateAssignments signment2 assignment1 FindObjectByType FindObjectByName ObjectsOfThisPage ... updating Assignmentsts GetCommandWindow _MiniSpy_HELP _Assign_HELP CloneClusterIntoN CloneCluster CloneSelection CloneTarget ExecuteCommand showmenubar buttonUpToSelection InsertPages DeleteThisPage CutThisPage CopyThisPage DuplicateThisPage copyTarget FindObjectByType FindObjectByName ObjectsOfThisPagee assignmentList "currentAssignments" B"updateAssignments" enterPage enterPage assignmentList currentAssignments buttonUp updateAssignments call like -- " ( example, %a distributor: -- myOwnWrapAroundFunction specialHandlerCall 8"c:\xyz\q\abc. RETURN TRUE -- ObjectsOfThisPage [objList ) & CRLF :" & FindObjectByName 4s_lastObjName Ask " retName 8, etc [foundObj tempObjList <> NULL 2 ) = "There p" && \ QUOTE & & "on p" && 5":" \ & FindObjectByType 4s_lastObjType type:" ) = " && & "on " && ":" \ "The " && & "does xexist." assignment1 assignment2 copyTarget targetObj DuplicateThisPage Paste CopyThisPage CutThisPage DeleteThisPage Request "Are sure delete ?" && \ cannot be reversed." f"&Ok" "&Cancel" c"ok" InsertPages how urrent AnythingGoes "What think means?" assignment3 assignment4 assignment5 assignment6 ProcessAssignments -- I'm , so won't be -- listed regular "progressReport" "... processing [assignments tempScr 6)) = " " ) AND \ ( ( \)) = " & "... updating tempChr CR & "," & & "," & LF "currentAssignments" buttonUpToSelection ProcessAssignments assignment2 copyTarget DuplicateThisPage FindObjectByName CopyThisPage CutThisPage FindObjectByType DeleteThisPage InsertPages AnythingGoes assignment1 assignment3 assignment4 ObjectsOfThisPage assignment5 assignment6 buttonUpToSelection ObjectsOfThisPage Objects of this page: objList FindObjectByName Find object with name: group There is no object with name on this page. Objects with name tempObj tempObjList foundObj retName s_lastObjName FindObjectByType button,field,page,background,rectangle,recordfield Find all objects of type: group There is no object of type on this page. Objects of type The object type does not exist. tempObj tempObjList foundObj retName s_lastObjType objList assignment1 buttonUp assignment2 copyTarget targetObj DuplicateThisPage Paste CopyThisPage CutThisPage DeleteThisPage Are you sure you want to delete this page? This process cannot be reversed. &Cancel clear InsertPages Insert how many pages after the current page? y5newPage AnythingGoes What do you think this means? assignment3 assignment4 assignment5 assignment6 ProcessAssignments progressReport ... processing Assignments assign.sbk progressReport ... updating Assignments assignmentList currentAssignments progressReport tempChr tempScr assignments buttonUpToSelection buttonUp Please select an object first. Book Script "Assign.sbk", the companion "MiniSpy. Developer Utility -- Jurgen Sladeczek -- Copyright 1993 -- All Rights Reserved -- Source Code Version 2.0 -- Release r: July 22, 1993 -- Description: -- * Contains ustomizable list user defined functions that are accessible 's main dialogbox -- History + Known problems: -- In Books flarge scripts, fmany -- lots contents), ToolBook may display a "memory -- message (repeatedly). Just click on OK ( -- dismiss -- Contact address comments suggestions: -- -- 100 D Stinson St. -- Chapel Hill, NC 27514 -- How use ASSIGN.sbk: -- (As lengthy describe, but -- easily done!) -- TO RUN A SCRIPT VIA MINISPY: -- Assuming already installed, -- mousebutton bring up -- (If you 't have U yet, -- Install Bprovided there). -- Double-Click on hand side, -- want . (Or -- "Execute" -- TO ADD YOUR OWN TO THE LIST: "Edit Assignments" B. This will 2: Write handler your . Remember always write form K. (You can handlers, but they ignored ilation assignment 3: After choose "Save- ", a prompt whether update . Choose "Yes", just added a pNo" edited existing -- Note: de below, can't teach directly via -- However, find situations, where absolutely need DIRECTLY, I would like know. -- (I imagine such a 's why I didn't -- include capability). -- If some other don't convert , try a "wrap-around" call -- "Wrap- % example, %a distributor: -- myOwnWrapAroundFunction specialHandlerCall 8"c:\xyz\q\abc. RETURN TRUE -- -- Then be listed Hexecuting immediately bookscript 8"c:\ -- Below (rather simple) sample ObjectsOfThisPage [objList ) & CRLF "Top-level :" & FindObjectByName 4s_lastObjName Ask " retName 8, etc [foundObj tempObjList <> NULL 2 ) = "There p" && \ QUOTE & & "on p" && 5":" \ & FindObjectByType 4s_lastObjType type:" ) = " && & "on " && ":" \ ) > 0 "The {TYPE" && & "does copyTarget targetObj DuplicateThisPage Paste CopyThisPage CutThisPage DeleteThisPage Request "Are sure delete ?" && \ process cannot be reversed." f"&Ok" "&Cancel" c"ok" InsertPages how urrent ProcessAssignments -- I'm , so won't be regular "progressReport" "